home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 011 / ask.arc / ASK.BAT < prev    next >
Encoding:
DOS Batch File  |  1984-04-04  |  1.3 KB  |  66 lines
  1. CD \
  2. ECHO OFF
  3. PROKEY/C
  4. COPY \ASM\%1.ASM D:TEMP.ASM
  5. prokey ed.pro/r/[alte]
  6. PE D:TEMP.ASM
  7. COPY d:temp.asm \asm\%1.asm
  8. if exist d:%1.lst DEL D:%1.LST
  9. if exist d:%1.ref DEL D:%1.REF
  10. if exist d:%1.lnk DEL D:%1.LNK
  11. CLS
  12. masm D:TEMP.ASM,D:$temp,D:%1,D:%1
  13. if %2 ==L GOTO XREF
  14. if %2 ==l GOTO XREF
  15. GOTO NXREF
  16. :XREF
  17. ECHO DO YOU WANT TO LINK ?
  18. ASK
  19. IF NOT ERRORLEVEL 1 GOTO REDO
  20. cref D:%1,D:%1
  21. if exist d:%1.crf DEL D:%1.crf
  22. if exist d:%1.exe DEL D:%1.exe
  23. LINK @LINK.ARF
  24. rename D:$temp.exe D:%1.exe
  25. DEL D:$temp.OBJ
  26. :NXREF
  27. if %2 ==L GOTO print
  28. if %2 ==l GOTO print
  29. goto nolist
  30. :print
  31. ECHO DO YOU WANT TO PRINT LISTING ?
  32. ASK
  33. IF not ERRORLEVEL 1 GOTO nolist
  34. PRINT D:%1.LST
  35. PRINT D:%1.REF
  36. PRINT D:TEMP.LNK
  37. :NOLIST
  38. IF %3 ==C GOTO COM
  39. IF %3 ==c GOTO COM
  40. GOTO NOCOM
  41. :com
  42. EXE2BIN D:%1.EXE D:%1.COM
  43. DIR D:%1.*
  44. :NOCOM
  45. goto end
  46. :print1
  47. PRINT D:%1.LST
  48. PRINT D:%1.REF
  49. PRINT D:TEMP.LNK
  50. :end
  51. prokey dos.pro/r
  52. GOTO QUIT
  53. :REDO
  54. ECHO DO YOU WANT TO SEE LISTING ?
  55. ASK
  56. IF ERRORLEVEL 1 GOTO TYPEIT
  57. GOTO EDQUE
  58. :TYPEIT
  59. TYPE D:%1.LST|MORE
  60. :EDQUE
  61. ECHO DO YOU WANT TO RE-EDIT ?
  62. ASK
  63. IF NOT ERRORLEVEL 1 GOTO END
  64. ASM %1 %2 %3
  65. :QUIT
  66.